PC Home 109/PC Home 109.iso/data1.cab/Program_Files/be006.dxr/00017.ls

Text File | 2001-03-02 | 312 b | 15 lines

on exitFrame
  set LastTick to the ticks
  set OriginalTick to the ticks
  repeat while (the ticks - OriginalTick) < 100
    set x to 15 * (the ticks - LastTick)
    set LastTick to the ticks
    set the locH of sprite 10 to the locH of sprite 10 + x
    updateStage()
  end repeat
end

on mouseUp
  go(100)
end